home *** CD-ROM | disk | FTP | other *** search
/ ftp.cs.arizona.edu / ftp.cs.arizona.edu.tar / ftp.cs.arizona.edu / icon / newsgrp / group98b.txt / 000164_icon-group-sender _Mon Aug 31 09:29:15 1998.msg < prev    next >
Internet Message Format  |  2000-09-20  |  2KB
  1. Return-Path: <icon-group-sender>
  2. Received: from kingfisher.CS.Arizona.EDU (kingfisher.CS.Arizona.EDU [192.12.69.239])
  3.     by baskerville.CS.Arizona.EDU (8.9.1a/8.9.1) with SMTP id JAA00967
  4.     for <icon-group-addresses@baskerville.CS.Arizona.EDU>; Mon, 31 Aug 1998 09:29:15 -0700 (MST)
  5. Received: by kingfisher.CS.Arizona.EDU (5.65v4.0/1.1.8.2/08Nov94-0446PM)
  6.     id AA21360; Mon, 31 Aug 1998 09:28:50 -0700
  7. Message-Id: <35E814C9.A0E6FEBC@charlie.cns.iit.edu>
  8. Date: Sat, 29 Aug 1998 09:48:41 -0500
  9. From: "Thomas W. Christopher" <tc@charlie.cns.iit.edu>
  10. Organization: Illinois Institute of Technology
  11. X-Mailer: Mozilla 4.06 [en] (WinNT; I)
  12. Mime-Version: 1.0
  13. To: "icon-group@CS.Arizona.EDU" <icon-group@optima.CS.Arizona.EDU>
  14. Subject: Spoonerisms
  15. Content-Type: text/plain; charset=us-ascii
  16. Content-Transfer-Encoding: 7bit
  17. Content-Transfer-Encoding: 7bit
  18. Content-Transfer-Encoding: 7bit
  19. Errors-To: icon-group-errors@optima.CS.Arizona.EDU
  20. Content-Transfer-Encoding: 7bit
  21. Status: RO
  22. Content-Length: 614
  23.  
  24. Bob Ardler,
  25.  
  26. Your spoonerism program can be obfuscated a bit as follows:
  27. procedure main()
  28.   L := ["g","m","h","f"]
  29.   every h:=1 to 4 & i:=1 to 4 & j:=1 to 4 & k:=1 to 4 do {
  30.           write(fit(h,i,j,k))
  31.   }
  32. end
  33.  
  34. global L
  35.  
  36. procedure fit(a,b,c,d)
  37.   if a=(b|c|d)|b=(c|d)|c=d then fail
  38.   return "A "||L[a]||"ood "||L[b]||"an is "||L[c]||"ard to
  39. "||L[d]||"ind."
  40. end
  41.  
  42. Although Clayton's solution is the best so far.
  43. --
  44. Thomas W. Christopher -- tc@charlie.cns.iit.edu , tc@toc-press.com
  45. Principal, Tools of Computing LLC. -- http://www.toc-press.com
  46. Associate Prof., Illinois Inst. of Tech. -- http://www.iit.edu/~tc
  47.  
  48.  
  49.